﻿Public NotInheritable Class LiteralRange
    Inherits RegularExpression

    Private m_range As CharRange
    Public ReadOnly Property Range() As CharRange
        Get
            Return m_range
        End Get
    End Property

    Public Sub New(ByVal range As CharRange)
        MyBase.New(RegularExpressionType.LiteralRange)

        m_range = range
    End Sub
End Class
